;QAMA Application Equates
; DEFINE TI83P
; DEFINE BETA  
 
  EXTERN _MainSlide

 GLOBALS ON

;Version  EQU 1
;AppName EQU  "SlideTst"
;MaxSlideDepth EQU 10
;NumVariables EQU 26


 segment InternalRAM
Variables ds NumVariables*2        ;26 Letters, 2 bytes each
SlideDepth ds 1                    ;Number of Slides in current call table
SlideStack ds MaxSlideDepth*2      ;Stack of slides, 2 bytes for SlidePtr, 2 bytes for CurSlide
SlidePtr ds 2                      ;Pointer to current slide instruction
HLSave ds 2
ASave ds 1
PenSave ds 2
SaveSScreenSave ds 2
CurLibTabEntry ds 2


SlideFlags EQU asm_Flag1
SkipNextCmd equ 0
SkipThisNext EQU 1

 GLOBALS OFF

LibTable      EQU 7F00h





 INCLUDE "expression.inc"

